Postcard CD: Niagara Parks/Postcard CD: Niagara Parks (2004).iso/mac/prv-f.dxr/B-W Icons_29.ls

Text File | 2002-01-10 | 649 b | 34 lines

global castName

on beginSprite me
  if castName = "MaidOfTheMist" then
    sprite(51).blend = 100
    sprite(51).memberNum = sprite(51).memberNum + 14
  end if
end

on mouseEnter me
  if castName <> "MaidOfTheMist" then
    sprite(51).blend = 100
    sprite(51).memberNum = sprite(51).memberNum + 14
  end if
end

on mouseLeave me
  if castName <> "MaidOfTheMist" then
    sprite(51).blend = 50
    sprite(51).memberNum = sprite(51).memberNum - 14
  end if
end

on mouseDown me
  global castIndex, PauseSS
  if PauseSS = 1 then
    PauseSS = 0
    sprite(100).member = member(8, 2)
  end if
  castIndex = 1
  castName = "MaidOfTheMist"
  go(2)
end